home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 071-080 / amok75 / oberon3.0 / o3demo2.lzh / Definitions / XYplane.def < prev    next >
Text File  |  1992-08-22  |  230b  |  18 lines
  1. DEFINITION XYplane;
  2.  
  3. CONST
  4.   erase = 0;
  5.   draw = 1;
  6.  
  7. VAR
  8.   X, Y, W, H : INTEGER;
  9.  
  10. PROCEDURE Clear;
  11. PROCEDURE Open;
  12. PROCEDURE Dot(x, y, mode: INTEGER);
  13. PROCEDURE IsDot(x, y: INTEGER): BOOLEAN;
  14. PROCEDURE Key(): CHAR;
  15.  
  16. END XYplane.
  17.  
  18.